home *** CD-ROM | disk | FTP | other *** search
/ Aminet 25 / Aminet 25 (1998)(GTI - Schatztruhe)[!][Jun 1998].iso / Aminet / dev / amos / AMOS0398.lzh / AMOSLIST / 000310_amos-request@svcs1.digex.net_Sun Mar 29 01:20:12 1998.msg < prev    next >
Text File  |  1998-04-01  |  2KB  |  68 lines
  1. >From amos-request@svcs1.digex.net  Sun Mar 29 01:20:11 1998
  2. Received: from svcs1.digex.net (svcs1.digex.net [204.91.197.224])
  3.     by pony-1.mail.digex.net (8.8.8/8.8.8) with ESMTP id BAA29848
  4.     for <mcox@access.digex.net>; Sun, 29 Mar 1998 01:20:11 -0500 (EDT)
  5. Received: (from daemon@localhost)
  6.     by svcs1.digex.net (8.8.5/8.8.5) id AAA23671
  7.     for amos-out; Sun, 29 Mar 1998 00:14:45 -0500 (EST)
  8. Received: from pony-2.mail.digex.net (pony-2.mail.digex.net [204.91.241.6])
  9.     by svcs1.digex.net (8.8.5/8.8.5) with ESMTP id AAA23668
  10.     for <amos-list@svcs1.digex.net>; Sun, 29 Mar 1998 00:14:44 -0500 (EST)
  11. Received: from mail.netwave.net (mail.netwave.net [207.112.132.11])
  12.     by pony-2.mail.digex.net (8.8.8/8.8.8) with ESMTP id AAA02954
  13.     for <amos-list@access.digex.net>; Sun, 29 Mar 1998 00:14:43 -0500 (EST)
  14. Received: from pppsrs91.netwave.net (pppsrs91.netwave.net [209.100.37.91])
  15.     by mail.netwave.net (8.8.5/8.8.5) with SMTP id XAA03790;
  16.     Sat, 28 Mar 1998 23:32:25 -0600
  17. Date: 28 Mar 98 22:03:46 -0600
  18. From: "Rand R. Fredricksen" <rand@mail.netwave.net>
  19. Subject: Re: extension?
  20. To: "Rune Zedeler" <rzedeler@post10.tele.dk>
  21. In-Reply-To: <yam7378.2392.139795288@post10.tele.dk>
  22. Message-ID: <910.391T2328T13234545@netwave.net>
  23. MIME-Version: 1.0
  24. Content-type: text/plain; charset=us-ascii
  25. Content-transfer-encoding: 7bit
  26. Cc: amos-list@access.digex.net
  27. X-Mailer: THOR 2.5a (Amiga;TCP/IP)
  28. Status: O
  29. X-Status: 
  30.  
  31. Rune Zedeler digitized on 15-Mar-98 05:29:47:
  32.  RZ> On 15-Mar-98, Rand R. Fredricksen wrote:
  33.  
  34. >>On X Goto _Hello,_Goodbye
  35.  
  36.  RZ> Or even better:
  37.  
  38.  RZ> Trap Gosub "_"+X$
  39.  RZ> if Errtrap
  40.  RZ>   Print "I don't understand a thing, dummy!"
  41.  RZ> End If
  42.  RZ> End
  43.  
  44.  RZ> _Hello:
  45.  RZ> Print "Hello right back, Buddy!!!"
  46.  RZ> Return
  47.  
  48.  RZ> _Goodbye:
  49.  RZ> Print "Ok, seeya!!!"
  50.  RZ> Return
  51.  
  52. Ouch! How gauche.
  53.  
  54. I thought we were trying to imitate the switch/case command :)
  55.  
  56.  
  57. Greets,
  58.  - Rand
  59. -- 
  60.   ______                                ________________________ ////
  61.  |   _   \  _____   ___   __ _____      mailto:rand@netwave.net ////
  62.  |  [_}   )(___  \ (   \ |  (  _  \ http://www.netwave.net/members/rand
  63.  |   _   (  / __  \ |   \|  | |_}  )                          ////
  64.  |__| \___)(_______(__|\____(_____/                      \\\\////
  65.  
  66.  
  67. You're not afraid of heights, are you Doctor?   Worf
  68.